ocr: - SOLIMIEW-SOLOUETYBUutrybutonzpushbuton nethod pushButton(uar eventinfo Event) var anstbl String QueryText String soneforn Form Retform Logical enduar if SSqlAlias then someform.open("SOLQUERY") nessage("Please enter your SQL QUERY") Retform L somerorn.wait() if not Retform then someform.close() return endif Retform : False Querylext = someforn.querylext soneform.close() if 15m5igned(querylext) and QueryText € : then anstbl = ":PRIU:Salquery" ExecutesQLTable(querylext,Strdbname,ThisPassword,anstbl) if - cv.open(anstbl,WinstyleDerault,100,100,5500,4000) then Setfablevirenttrimuteso .settidier" ...
